g np clippath 1 H V G

np mif

np

u

O

[]0 p

cp

b

a

***

dup neg S t

copypage

{0 ctf exec .5 lt{{1. exch sub}stcp}if erasepage}stopped pop

gsave newpath clippath pathbbox grestore

erasepage

F

T

xpcscrn

cp mif

70 dict begin /showpage{}def /copypage{}def np

o m l n

rm

initmatrix

G cps np mif

currentfont 1 scalefont setfont

0 a

u np mif

cps np

m l n

cleartomark

cps np mif

g np

exch neg exch

g H

matrix defaultmatrix

m 90 rotate(

statusdict begin

-90 rotate

xpwsh

90 rotate

lineto

}stopped pop end

M

t S

V G

nulldevice

1 o

scale

1 H

1 a

moveto

mul

0 t

dup t

dup S

0 H

Y

p

T 4 clrimg


F 3 clrimg


imagemask


image


o

R

C

H

xpawsh

xpash

xpsh

showpage

z

xpscrn

S

t

G

g

Q

save

restore

N

n

mrl

}ifelse

l

m

}{

U

end

begin

sub

add

def

div

dup

neg

V

v

arcto